Current File : //usr/share/webmin/usermin/syslog_logs.pl |
# Contains a function to supply the syslog module with extra logs
require 'usermin-lib.pl';
# syslog_getlogs()
# Returns the Usermin error log
sub syslog_getlogs
{
local %miniserv;
&get_usermin_miniserv_config(\%miniserv);
if ($miniserv{'errorlog'} eq '-') {
# Logging to stdout
return ( );
}
elsif ($miniserv{'errorlog'}) {
# Specific file
return ( { 'file' => $miniserv{'errorlog'},
'desc' => $text{'syslog_errorlog'},
'active' => 1, } );
}
elsif ($miniserv{'logfile'} =~ /^(.*)\/[^\/]+$/) {
# Relative to main log
return ( { 'file' => "$1/miniserv.error",
'desc' => $text{'syslog_errorlog'},
'active' => 1, } );
}
}